home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / SPX30.ZIP / SPX_INT.ZIP / SPX_IMG.INT < prev    next >
Encoding:
Text File  |  1994-06-10  |  1.1 KB  |  35 lines
  1. Unit SPX_IMG;
  2.  
  3. {$X+,O+ }
  4. { SPX Library Version 3.0  Copyright 1994 Scott D. Ramsay }
  5.  
  6. Interface
  7.  
  8. Uses spx_vga,spx_dos;
  9.  
  10. const
  11.   img_noerror   = 0;    { no error }
  12.   img_notbmp    = 1;    { not a win3.0 BMP file }
  13.   img_notpcx    = 2;    { not a 256 color PCX file }
  14.   img_errorload = 3;    { file not found or open error }
  15.   img_errorread = 4;    { other disk read error }
  16.   img_badcolor  = 5;    { not 8bit BMP file }
  17.   img_errorsave = 6;    { error saving PTR file }
  18.   img_erralloc  = 7;    { memory allocation error }
  19.  
  20. type
  21.   VidHdrType = record
  22.                  position,count : word;
  23.                end;
  24.  
  25. function loadbmp(bfilename:string;x,y:integer):integer;
  26. function loadpcx(pfilename:string):integer;
  27. function loadspcx(fname:string;x,y:integer):integer;
  28. procedure filepcx(var pcxfile:file;size:longint);
  29. procedure drawpcx(var p;size:word);
  30. procedure drawspcx(var start;size:longint;x,y:integer);
  31. procedure DrawPtr(var p;merge:boolean;sz:longint);
  32. function LoadPTR(fn:string;merge:boolean):integer;
  33. function SavePTR(fn:string):integer;
  34.  
  35.